home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / bbs / mxgui203.zip / _SCRIPT.TXT < prev    next >
Text File  |  1997-08-12  |  3KB  |  60 lines

  1. {
  2. ───────────────────────────────────────────────────────────────────────────────
  3.   ▀▀▀   ▀▀▀   ▀▀▀▀▀   ▀▀   ▀▀
  4.   ▀▀▀▀ ▀▀▀▀  ▀▀   ▀▀   ▀▀ ▀▀
  5.   ▀▀ ▀▀▀ ▀▀  ▀▀▀▀▀▀▀    ▀▀▀    ╔══ ╦═╗ ╔═╗ ╦═╗ ╦ ╦ ╦ ╔═╗ ╔═╗
  6.   ▀▀  ▀  ▀▀  ▀▀   ▀▀   ▀▀ ▀▀   ║ ╦ ╠╦╝ ╠═╣ ╠═╝ ╠═╣ ║ ║   ╚═╗
  7.   ▀▀     ▀▀  ▀▀   ▀▀  ▀▀   ▀▀  ╚═╝ ╩╚═ ╩ ╩ ╩   ╩ ╩ ╩ ╚═╝ ╚═╝
  8. ───────────────────────────────────────────────────────────────────────────────
  9.   The MAX Graphics GUI Kit is Copyright 1995-Current Larry L. Athey (LA-Soft).
  10.   Color Averaging procedures are courtesy of Sean Price (Rude Dog Software).
  11. ───────────────────────────────────────────────────────────────────────────────
  12.  
  13. INTERFACE
  14.  
  15. TYPE SB_Information = RECORD     {Be sure you set these before using the SB!!}
  16.      IRQ            : STRING[2]; {Sound card port IRQ.                       }
  17.      DMA            : STRING[2]; {Sound card DMA channel.                    }
  18.      Address        : STRING[3]; {Sound card port address with no "$".       }
  19.      END;
  20.  
  21. VAR
  22.   SB         : SB_Information; {SoundBlaster settings record variable.       }
  23.   HomeDir    : STRING[80];     {Current program home directory.              }
  24.   ResPath    : STRING[80];     {Resource Path.                               }
  25.   SesPath    : STRING[80];     {Session Path.                                }
  26.   DownPath1  : STRING[80];     {System download path.                        }
  27.   DownPath2  : STRING[80];     {System download path backup.                 }
  28.   ScrStr     : STRING;         {String that holds the current script command.}
  29.   ScreenDone : BOOLEAN;        {Becomes TRUE upon the End_Screen() command.  }
  30.   UseSB      : BOOLEAN;        {Use SoundBlaster? [Y/N]                      }
  31.   MouseOn    : BOOLEAN;        {Should the mouse cursor be on? [Y/N]         }
  32.   TextFile   : TEXT;           {Text file created by Start_Text_File().      }
  33.  
  34. PROCEDURE PlayButtonSound(FName : STRING);
  35. {^ Plays a button sound file attachment.                                     }
  36. PROCEDURE ShutDownSvga;
  37. {^ Shuts down the SVGA interface and returns to 80x25x16 text mode.          }
  38. PROCEDURE RestartSvga;
  39. {^ Restarts the SVGA interface after a call to ShutDownSvga.                 }
  40. PROCEDURE Execute(FName : STRING);
  41. {^ Executes an external program.                                             }
  42. PROCEDURE DropToDOS;
  43. {^ Temporarily shells to the command prompt.                                 }
  44. PROCEDURE WriteSystemInfo;
  45. {^ This procedure writes the SYSTEM.NFO file.                                }
  46. PROCEDURE IndexResources;
  47. {^ This procedure is used to create a local resource list.                   }
  48. PROCEDURE ShowRemoteScreen(FName : STRING);
  49. {^ Called by the Show_Remote_Screen() MAX command.                           }
  50. PROCEDURE CheckControlLine(Command : STRING);
  51. {^ This procedure is used to check a text string to see if it matches one
  52.    of the predefined MAXscript commands.                                     }
  53. PROCEDURE CheckScriptLine(Command : STRING);
  54. {^ This procedure is used to check a text string to see if it matches one
  55.    of the predefined MAXcontrol commands.                                    }
  56. PROCEDURE CheckColorCommand(Command : STRING);
  57. {^ This procedure is used to check a text string to see if it matches one
  58.    of the predefined MAXcolor commands.                                      }
  59. {────────────────────────────────────────────────────────────────────────────}
  60.